(electric-buffer-list): Use list-buffers-noselect.

diff --git a/lisp/ebuff-menu.el b/lisp/ebuff-menu.el
index d9687771b05c0ce1fe9c913016943c113fe60668..b50dbe88065c0a691e878337103f20d29c141840 100644 (file)
--- a/lisp/ebuff-menu.el
+++ b/lisp/ebuff-menu.el
@@ -58,8 +58,8 @@ Calls value of `electric-buffer-menu-mode-hook' on entry if non-nil.
   (interactive "P")
   (let (select buffer)
     (save-window-excursion
-      (save-window-excursion (list-buffers arg))
-      (setq buffer (window-buffer (Electric-pop-up-window "*Buffer List*")))
+      (setq buffer (list-buffers-noselect arg))
+      (Electric-pop-up-window buffer)
       (unwind-protect
          (progn
            (set-buffer buffer)